﻿
Public Class cPromociones

    Sub New(ByVal idPromocion As String)

    End Sub
    Public Property idPromocion() As Integer
        Get

        End Get
        Set(ByVal value As Integer)

        End Set
    End Property

    Public Property descripcion() As String
        Get

        End Get
        Set(ByVal value As String)

        End Set
    End Property

    Public Property deseFecha() As Date
        Get

        End Get
        Set(ByVal value As Date)

        End Set
    End Property

    Public Property hastaFecha() As Date
        Get

        End Get
        Set(ByVal value As Date)

        End Set
    End Property

    Public Property cantidadComprar() As Integer
        Get

        End Get
        Set(ByVal value As Integer)

        End Set
    End Property

    Public Property codigoProducto() As String
        Get

        End Get
        Set(ByVal value As String)

        End Set
    End Property

    Public Property tipoProducto() As String
        Get

        End Get
        Set(ByVal value As String)

        End Set
    End Property

    Public Property unidadesObsequiar() As Integer
        Get

        End Get
        Set(ByVal value As Integer)

        End Set
    End Property

    Protected Overrides Sub Finalize()

    End Sub
End Class
